10 INPUT"NAME ";NE$
20 NA$="[129]PIC ? "+NE$+"*":SYS(57812)NA$,8,1
40 REM  ^ KOALAPAINTERBILD LADEN
60 POKE780,0:SYS65493
70 PRINT"DISKETTE WECHSELN!":POKE198,0:WAIT198,1:POKE198,0
90 REM  ^ WIE DER TEXT SCHON SAGT...
110 PRINT"HIRESBEREICH WIRD ABGESPEICHERT.":POKE193,0:POKE194,96
120 POKE174,64:POKE175,127:SYS(57812)"H"+NE$,8:SYS62957
140 REM ^ HIRES ABSPEICHERN...
160 PRINT"FARBBEREICH WIRD ABGESPEICHERT.":POKE193,64:POKE194,127
170 POKE174,17:POKE175,135:SYS(57812)"F"+NE$,8:SYS62957
190 REM ^ FARBE ABSPEICHERN ... FERTIG!